home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / bbs / mc2.zip / MAILRUN.BAT < prev    next >
DOS Batch File  |  1992-11-30  |  2KB  |  78 lines
  1. @ECHO OFF
  2.  
  3.   TNET EXPORT SINBAD
  4.   TNET EXPORT DDBBS
  5.   TNET EXPORT NORTHGA
  6.  
  7.   Mc2 NEW
  8.  
  9. G:
  10.   CD\ROBO
  11.   ROBOCOMM /AEMAIL /R /O
  12.   
  13. C:
  14.  
  15. ECHO ------------------------------------------------------------------------------- >>C:\WC30\ACTIVITY.001
  16.  
  17. ECHO 04:00 Pleasure Island [Network] - Mail Run at 14400 bps on thisday >>C:\WC30\ACTIVITY.001
  18.   
  19.  
  20.   IF NOT EXIST D:\MAIL\SINBAD.QWK GOTO AD_FAIL
  21.     TNET IMPORT SINBAD
  22.     Mc2 AFTERDARK (For Adults Only) NETWORK
  23.  
  24. ECHO * TNET - Imported AFTERDARK messages successfully >>C:\WC30\ACTIVITY.001
  25.  
  26.   goto SCIFI
  27.  
  28. :AD_FAIL
  29.  
  30.   ECHO ******** AFTERDARK MAIL RUN FAILED  ******** >>C:\WC30\ACTIVITY.001
  31.  
  32. :SCIFI
  33.  
  34.   IF NOT EXIST D:\MAIL\DDBBS.QWK GOTO SF_FAIL
  35.   TNET IMPORT DDBBS
  36.   Mc2 SCI-FI (Science Fiction & Fantasy) NETWORK
  37.   Mc2 SHADES N' SHADOWS (Fantasy) NETWORK
  38.  
  39.   ECHO * TNET - Imported SCI-FI NET messages successfully >>C:\WC30\ACTIVITY.001
  40.   ECHO * TNET - Imported SHADOW NET messages successfully >>C:\WC30\ACTIVITY.001
  41.  
  42.   goto WILD
  43.  
  44. :SF_FAIL
  45.  
  46.    ECHO ******** SCI-FI NET MAIL RUN FAILED ********>>C:\WC30\ACTIVITY.001
  47.  
  48. :WILD
  49.  
  50. IF NOT EXIST D:\MAIL\NORTHGA.QWK GOTO WN_FAIL
  51.   TNET IMPORT NORTHGA
  52.   Mc2 WILDNET (WorldWide) NETWORK
  53.  
  54.   ECHO * TNET - Imported WILDNET messages successfully >>C:\WC30\ACTIVITY.001
  55.  
  56.   goto END
  57.  
  58. :WN_FAIL
  59.  
  60.    ECHO ******** WILDNET MAIL RUN FAILED ********>>C:\WC30\ACTIVITY.001
  61.  
  62. :END
  63.  
  64.   ECHO 04:30 Signed off Normally -  Timed Logged 30 minutes with 30 minutes remaining >>c:\wc30\activity.001
  65.  
  66.   If EXIST D:\MAIL\SINBAD.REP DEL D:\MAIL\SINBAD.REP
  67.   If EXIST D:\MAIL\SINBAD.QWK DEL D:\MAIL\SINBAD.QWK
  68.   If EXIST D:\MAIL\DDBBS.REP DEL D:\MAIL\DDBBS.REP
  69.   If EXIST D:\MAIL\DDBBS.QWK DEL D:\MAIL\DDBBS.QWK
  70.   If EXIST D:\MAIL\NORTHGA.REP DEL D:\MAIL\NORTHGA.REP
  71.   If EXIST D:\MAIL\NORTHGA.QWK DEL D:\MAIL\NORTHGA.QWK
  72.  
  73.      Mc2 END
  74.  
  75.      TOMCAT John Davenport /prescan
  76.  
  77.      DUPMSG
  78.